home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-02
/
xlib.zip
/
XVOLUME.DOC
< prev
next >
Wrap
Text File
|
1992-09-05
|
963b
|
37 lines
XVolume
-------
This unit give you object-oriented access to the volume-label of
the drives in your computer.
TVolumeLabel
~~~~~~~~~~~~
"TVolumeLabel" implements a general object for access the volume-labels
on drives.
Fields:
-------
Drv : Char The Drive which should be used
Methods
-------
constructor Init( ADrv:Char );
Initialize the object for a given drive. ADrv can be ranged from
'A' to 'Z'.
procedure Put ( Labl:PathStr ); virtual;
Set the Volumelabel of the drive to the value in "Labl".
procedure Delete ( Labl:PathStr ); virtual;
Deletes the label.
procedure Rename ( Labl:PathStr ); virtual;
Deletes an existing label and sets a new one to it.
This method should be used for setting a label.
function Get: PathStr; virtual;
Return the label currently assigned to the specific drive